DDDDDDDDDDDD EEEEEEEEEEEEEEE BBB8BBBB8BB8B UUU UUU GGGGGGGGGGGG 
DODDDDDDDDDD EEEEEEEEEEEEEEE BBB888BB8BBBB UUU UUU GGGGGGGGGGGG 
DDDDDDDDDDDD EEEEEEEEEEEEEEE B8BB8BB8BBEB UUU UUU GGGGGGGGGGGG 
DOD | DDD EEE BBB BBB UUU UU G 

DOD DDD EEE BBB BBB UUU UUU GGG 

DDD DDD EEE 888 BBB UUU UUU GGG 

DOD DOD EEE BBB BBB UUU UUU GGG 

DDD DOD EEE 888 BBB UUU UUU GGG 

DOD DDD EEE BBB BBB UUU UUU GGG 

DOD DDD EEEEEEEEEEEE BBBBBBBBBBBB UUU UUU GGG 

DDD DDD EEEEEEEEEEEE BBBBBBBS8EEBB UUU UUU GGG 

DOD DDD EEEEEEEEEEEE BBBBBBBSBBBB UUU UUU GGG 

DOD DDD EEE BBB UUU UUU GGG GG6GGGGGGG 
DDD DDD EEE B88 BBB UUU UUU GGG 6G6G6G6GGGG6G 
DOD DDD EEE BBB BBB UUU UUU GGG 666666666 
DDD DDD EEE 888 BBB UUU UUU GGG GGG 
DOD DDD EEE BBB BBB UUU UUU GGG GGG 
DOD DDD EEE BBB BBB UUU UUU GGG GGG 
DDDDDDDDDDDD EEEEEEEEEEEEEEE B88B8BB8B888 UUUUUUUUUUUUUUU GGGGGGGGG 
DDDDDODDDDDD EEEEEEEEEEEEEEE BBSBBBB8BBBB UUUUUUUUUUUUUUU GGGGGGGGG 
DDDDDDDDDDDD EEEEEEEEEEEEEEE BB8B8BBBBBBBB UUUUUUUUUUUUUUU GGGGGGGGG 


**f ILE**1D**DBGGEN 


DDDDDDDD BBBBBBBB GGGGGGGG GGGGGGGG EEEEEEEEEE NN NN 

DODDDDDD BBBBBBBB GGGGGGGG GGGGGGGG EEEEEEEEEE NN NN 

dD DD 8B BB GG GG EE NN NN 

DD DD 88 BB GG GG . 8 NN NN 

dD DD 8B BB GG GG EE NNNN NN 

DD DD 8B BB GG GG EE NNNN NN 

DD DD 88888888 GG GG EEEEEEEE NN NN NN 

0D DD B88B8B8BB GG GG EEEEEEEE NN NN NN 

dD DD 8B BB GG GGGGGG GG GGGGGG EE NN 

DD DD 88 BB GG GGGGGG GG GGGGGG EE NN NNNN 

0D DD 8B BB GG GG GG GG EE NN cece 
DD DD 88 BB GG GG GG GG EE NN NN cece 
DDDDDDDD BBBBBBBB GGGGGG GGGGGG EEEEEEEEEE NN NN oes 
DODDDDDD BBBBBBBB GGGGGG GGGGGG EEEEEEEEEE NN NN coos 
LL 111111 SSSSSSSS 

LL 111] SSSSSSSS 

LL I] SS 

LL I] S$ 

LL I] $$ 

LL I] SS 

LL I] SSSSSS 

LL I] $SSSSS 

LL I] $$ 

LL I] $$ 

LL I] SS 

LL I] $s 

LLELLLLLELLL T1111] SSSSSSSS 

CLELLLLLLL HIT] SSSSSSSS 
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: DBGGEN.REQ = Require file for VAX/VMS DEBUG facility. 


Version: *v04-000' 


SORA ARKH RAAEAAAAAHAHERAEEKAAEAAHAETHE AHHH HAH TeeeeeeeeeeeeAeeeeeeeeee 
' 


ie COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
ie DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
ie ALL RIGHTS RESERVED. 


B 

w 

® 

® 

® 

4 w 
ie THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 
ie ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE ® 
ie INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
ie COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY ®* 
ie OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY ®* 
ie TRANSFERRED. . 
® 

* 

® 

® 

® 

® 

® 

e 

® 


'* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
.* onmpokaT itn NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
.* . 


i® DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
!# SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


SRO PA HARARE AERA AAEAAEAEAEAAEAAKReeeeeeeeeeeeeeeeeeeteeeeeeeeetereneene 
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'ee 


1 

‘ Modified by 

: erore Olzen, 30 Aup 1979 

Richard Title, 20 Aug 1981 

‘ 9-jun-80 DLP Added Literals for PL/I, PASCAL, and C 

‘ 9-JAN-81 DLP chs_per_lexeme is now 

: 0-AUG-81 RT changed” step_lvl as ize and added step_source 
: because of new command 

: SET STEP SOURCE 

‘ 20-JAN-8 RT Moved CIS declarations from here to DBGLIB. 
06-MAY-8 RT Added structures for DEFINE 
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MACRO 


LITERAL 


NULL_POS_SIZE =0, 0, 0%, 


OPERAND _MODE 
OPERAND-VALUE =0, 0, 4 


DBG_FAC CODE = 2 * 65536, : 
THREAD CODE “}e ié 

=4, ! 
ADD. TRE OFFSET =1, ; 
SUB"THE-OFFSET =0, : 


i The next three Literals used to 


OVERRIDE 
17 OUT WIDTH = = go, i 
TYTASCTI_LEN = 80, i 


Values for register name tables 
REGISTER_COUNT =17, 


: size parameters 


MAX_ASCII -LENG = 4096, 
MAX"STACK"PTR  =2 
NO_OF_INP~CHARS =132, 


CHS_PER_LEXEME 
NO_OF _TOKENS 
MAX_BYTE_INT 
ALL_BPTS™ =-1, 
BPT- INSTRUCTION =2x'03', 
BREAK _POINT 
TRACE_ POINT = ¢: 
WATCH_POINT = 
eis = 
READ Ont. UATCH = 
EXECOTE_ WATCH = 
NUM_MAX_LENGTH 
SYM" MAX” LENGTH 


s 
Fo 
UPPER_CASE_DIF =: 
=% 


$ ‘A’, 
ASCII“OFFSET . 


60", 
ASCII character caericoncienit te 


LINEFEED =20'1 
CARRIAGE_RET  =%0"1 i 


1Boseoct9Re 25:00:06 


Null Be for undotted references to 


VAK=11 Bliss-32 v4.0 
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Mode part _* an operand 
Value part of an operand 


DEBUG facility code 

Cond om switch for threaded code 
Mask for fatal bit in error codes 

Add offset to value 

Subtract offset from value 


be defined in SYSLIT.REQ 


Use current Length and radix 
Width of terminal Line 
Max size of character variable 


Seventeen registers counting PSL 


Largest N in “ASCII: zn" 

Depth of the parser's parse stack. 

Max number of characters in input Line 
**eMust be divisible by 4#** 

Max number of characters in single lexeme 
***Must be divisible by 4** 

Max number of tokens ~ Rare 

s*tMust be an even number*t*t* 

Largest byte integer 

ALL breakpoints in chain 

Opcode assignment for bpt instruction (srm revision 3) 
Table entry is breakpoint 

Table entry is tracepoint 

Table entry is watchpoint 


Motchaoint is for write access 
Watch is for read/write access 
This 4g or trace point 


Maximum number of characters per numeric string 
Maximum number of characters per symbol 
Difference between ASCII representation of upper and lower case 


! Offset from numeric value to ASCII value 


representation of Linefeed 
representation of carriage return 


CDEBUG. SRC IOBGGEN. — 1 


Page 
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ASC_AT_SIGN =ZASCII ‘a’, ! ASCII representation an at sign 

ASC-CLOS_PAREN =ZASCII ')', ! ASCII representation of closed parenthesis 

ASC"COMMA sRASCII °,', : ASCII representation of a comma 

ASC_DOUB_QUOTE =ZASCII ‘'", ' ASCII representation of a double quote 

ASC"MINUS =ZASCII ‘-', ! ASCII representation of a minus s gn 

ASC_OPEN PAREN =ZASCII ‘(', ' ASCII representation of open parenthesis 

ASC"PERCENT =ZASCII ‘S', ! ASCII representation of a percent sign 

ASC_PERIOD =ZASCII ‘.', ! ASCII representation of a period 

ASC_PLUS =ZASCII ‘+', ! ASCII representation of a plus sign 

ASC_POUNDS =ZASC1I1 a ! ASCII representation of a pounds sign 

ASC_QUOTE sZASCI11 ‘'''’, ! ASCII representation of a quote character 
C_SPACE =ZASCII ‘ ° ! ASCII representation of a Space 

ASC_SQ_CLO_BRAK =ZASCII pe? ! ASCII representation of a closed square bracket 

ASC_SQ_OPN_BRAK =ZASCI] ‘C', ! ASCII representation of an open square bracket 
eA = 9 ! ASCII representation of a ta 

ASC_UP_ARROW =ZAScIl ‘** ! ASCII representation of an up arrow 


! The ‘mode’ data structure is really just 
a byte vector with the following characteristics. 


MODE_LVL_SIZE  =10, ' Number of bytes in each Level. 
MODE-LEVELS =4, ! Number of levels for mode settings 
Each level of the mode data strucutre has the following entries: 
MODE _RADIX =0, 
MODE “LENGTH =1; 
MODE _SYMBOLS =2, 


MODE_INSTRUC —=3, 


Radix = dec, hex, oct, etc. 
Length - long. word, byte. etc. 
Boolean => Ww ether we now values 
as ‘extern + offset’’ or not. 
Boolean => whether we input/output 
values as machine instruction. 


MODE _ASCI1 =4, Boolean -> whether we output (only!) 
values as ASCII strings or not. 
MODE _SCOPE =5, Whether or not there is a 


SP, 
(and whether we should apply it) 
Whether or not we should apply global 
scope first in the search rules. 
ZLINE, ZLABEL 
FORTRAN address or contents of mode 
Set the mode to G_FLOAT, so we can 
pick up the constant as G_FLOAT 
constant 


MODE _GLOBALS =6, 


MODE_FORTRAN _=7, 
MODE“IMMEDIATE =8 
MODE“G_FLOATS = 9, 


The four levels have the following names and indices. 
DEFAULT _MODE 0. ' Default system initialized mode 
e 


USER_DEF_MODE =1, ! User-set default mo 
OVERRIDE-MODE =2, ! One-line override mode 
OCAL _MOBE =5, ! Local mode 


: The mode_length field should be one of the following. 
BYTE_LENGTH 
WORD_LENGTH 
LONG_LENGTH 


Byte Length 
Word length 
Longword Length 


=1 
=2 
=4 
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And the mode_radix field should be one of: 


DECIMAL_RADIX  =10, ! Decimal radix 

HEX RADIX =16, ' Hexadecimal radix 

OCTAL RADIX 8. ' Octal radix 

BINARY_RADIX =e, ! Binary radix 

The FORTRAN mode fields are as follows: 

LABEL_MODE z1, ' Numbers are Label numbers 

LIN D =e, ! Numbers are Line numbers 
LITERAL_MODE =3, ! Numbers are Literal values 

! The ‘STEP’ data structure is really just a byte vector with the 
following characteristics. It is isomorphic to the ‘mode’ structure. 
STEP_LVL SIZE =4, ! Number of bytes in each level. 
STEP-LEVELS 33, ! Number of levels for step settings 
Each level of the step data strucutre has the following entries: 
STEP_LINE =0, ! LINE or INSTRUCTION (a boolean) 
STEP_NOSYSTEM =1, ! CNOJSYSTEM steps (a boolean) 
STEP_OVER =, ! INTO or OVER (a boolean) 
STEP_SOURCE =3, ! SOURCE or NOSOURCE 

] 

i 


The three levels have the following names and indices. 


DEFAULT STEP  =0, ! Default system initialized step 
USER_DEF_STEP =1, ! User-set default step type 
OVERRIDE-STEP =2, ! One-line override step type 


! The data structure which holds the settings for SET SEARCH is 
! a@ byte vector with the following characteristics (it works the 
same as the STEP data structure above) 


SEARCH_LVL_SIZE = 2, 
SEARCH_LEVELS = 3, 


Each level of the data structure has the following entries 
SEARCH_ALL = 0, 
SEARCH_IDENT = 1, 


The three levels have the following names and indices 
DEFAULT SEARCH = 0 


USER DEF_SEARCH = 1, 
OVERRIDE-SEARCH = 2, 
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' The data etructyre which op les the settings for SET DEFINE is 
' @ byte vector with the following characteristics (it works the 
same as the STEP data structure above) 
DEFINE _LVL_SIZE = 1, 
DEFINE-LEVELS = 3, 
Each level of the data structure has only one entry 


DEFINE_ONLY = 0, 


The three levels have the following names and indices 
DEFAULT DEFINE = 0 


USER_DEF_DEFINE = 1, 
OVERRIDE~DEFINE = 2, 


! The output configuration data structure is comparable to the STEP or 
' MODE data structures except that it has only one level. It is used 
to store information pertaining to DEBUG's output setting. 


OUTPUT_SIZE = 3, ! Number of bytes in the data structure 


The following entries are contained in the output config vector: 


OUT_L = 0, ' LOG or NOLOG 

OUT_TERM . 3, ! TERMINAL or NOTERMINAL 
OUT_VERIFY = ¢: ' VERIFY or NOVERIFY 
OUT_SCREEN = 3, ! SCREEN_LOG or NOSCREEN_LOG 


! Used to identify the flavor of type between dbg$show_type and its 
callers. 


DEFAULT = 0, 
OVERRIDE “Qs 


Bit configurations for context flags. 
CONTEXT_BITS  =32, ! Number of context bits 


Position of opcode byte at a breakpoint 
OPCODE_BYTE =0, ! Opcode offset 


Location types for end range arguments 
MEMORY _LOC =0, ! Memory Location 
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: Names of exception types for traceback. 


Nor AN_EXC =. ' Line ghumber searching for pc 

RAP_EXC =i, ' PC of rap searching for Line number 
FAULT EXC =: : PC of fault searching for line nunber 
LOOKUP_EXC 23; 


Like oh only don't do VAL_TO_SYM 
a 


Literals to define the various address spaces in the VAX architecture. 


LITERAL 
SYSTEM_SPACE - 49444 
P1_SPATE = %x'40000000" ; 

LITERAL 
Language names | 
LANG MACRO = 0, 
LANG_ FORTRAN = 1, 
LANG “BLISS = ¢° 
LANG_ COBOL = 3, ' COBOL 
LANG_BASIC = 4, ! BASIC+2 
LANG-PLI ge i PL/I | 
LANG_PASCAL = 6, : Pascal 
LAN = 7, : 
MAX_CANGUAGE = 6; ! Languages 0 - 6 (C not supported yet) 


! The semantic eteck is a BLOCKVECTOR for which the following fields 
are defined... 


FIELD STACK_FIELDS = 
SET 
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STKS$V_BAS 2 8. 0,0) ! Base of block. 
STKSV"VAL = [0,0,32,0), ' First value field 
5 STK$V_VAL2_—_ = (1,0,32,0], ' Second value field 
STKSV_NT PTR = (2,0,52,0), ! Pointer to name table entry 
STKSV—IND = (3,0,1 ' Index field 
08 STKSV-OFFSET = (3,16,16,05, i Offset field 
STK$V~POS = =_(4,0, 16,0), i Position fietd 
10 STKSV-TYPE = (4,16,8.0). i Token type field 
11 STK$V_SIZ = [4,24 ° ! Size field 
12 StkSv-EXT == 5, 1,6), i Sign extension bit 
15 STKSV_REF = (5,1,1,0], : Is token a REF pit 
14 STKSV_IMMED = gel . ! Immediate mode 
15 STKSV_LARGS = (5,5,1,0), 1 n ess actuals Supplied bit 
16 STKSV_FLDRF = eof ‘ ! <field sfgt> su supplied flag 
1 STK$V_DOT = $- Ol, ; ind rect lag 
18 STKSv~STRUC = (5,8,4, ! Kind of Briss structure 
3 TES; 
; 1 LITERAL 
§ STACK_ENTRY_SIZ = 6, ! No of longwords in a semantic_stack BLOCK 
NO_STR = 0, ! BLISS structure types 
4 vECTR = 1, 
5 BITVEC = 2, 


| 2 
18-se 1984 23:02:04 VAX-11 Bliss-32 V4.0-742 Page 7 
Wesebt1oRe $3:05:59 — “SSsdsnOABSCDCBUC gRcloBccEN.REa;1 22° «2h 
; § ; BLOCKVEC § | 
: 0328 : 
; 8 9 MACRO 
; 0 ° SEMANTIC STACK = BLOCKVECTOR(20, STACK_ENTRY_SIZ] FIELD(STACK_FIELDS)2; 
Se 
; Q g 6 : General purpose structure for manipulation of singly Linked lists. Each ceil 
; § ! contains two long-word fields. The first is a pointer to the next List Link 
: 8 5 4 } cell; the second is a pointer to the current element in the List. 
3 0387 0 LITERAL messes 
: O85 Ob LIST_LINK_SIZE = 8; ! Bytes in a List Link cell 
; 0340 0 FIELD LIST LINK_FLDS = 
; O38 0 NEXT_ONE_PTR = £0.08 36-02. ! Pointer to the next Link cell | 
>; 0343 0 THIS_ONE_PTR = [4,0,32,0] ! Pointer to the current object in the List 
; 0344 0 TES; 
; 0345 0 
: 0346 0 MACRO 
: Stee ° ; LIST_LINK = BLOCKCLIST_LINK_SIZE, BYTE] FIELD(LIST_LINK_FLDS)2; 
: 0349 0 i End of DBGGEN.REO 
COMMAND QUALIFIERS 
; Run Time: 00:07 -§ 
; Elapsed Time: 00:04. 
3; Lines/CPU Min: +e) 
; Lexemes/CPU-Min: 21 


Memory Used: 28 pe 
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